home *** CD-ROM | disk | FTP | other *** search
/ InfoMagic Internet Tools 1995 April / Internet Tools.iso / news / transport / cnews / patches / CR.E < prev    next >
Encoding:
Text File  |  1995-01-03  |  29.6 KB  |  1,161 lines
  1. Newsgroups: news.software.b
  2. Subject: C News patch CR.E
  3.  
  4. This is a patch for the C News Cleanup Release.  The distribution files
  5. on ftp.cs.toronto.edu and zoo.toronto.edu have been updated to match.
  6. See the README.changes diff below for what's been done.
  7.  
  8. start of patch CR.E
  9. (suggested archive name:  patchCR.E)
  10. apply with   patch -p0 <thisfile
  11.  
  12. Prereq: CR.D
  13. *** README.mastercopy    Mon Jan  2 16:31:19 1995
  14. --- README    Thu Dec 29 19:42:51 1994
  15. ***************
  16. *** 1,4 ****
  17. ! Cleanup Release of C News, with patch CR.D            Nov 1994
  18.   
  19.   The current C News distribution can be retrieved by anonymous FTP from
  20.   ftp.cs.toronto.edu (file pub/c-news/c-news.tar.Z) or ftp.zoo.toronto.edu
  21. --- 1,4 ----
  22. ! Cleanup Release of C News, with patch CR.E            Jan 1995
  23.   
  24.   The current C News distribution can be retrieved by anonymous FTP from
  25.   ftp.cs.toronto.edu (file pub/c-news/c-news.tar.Z) or ftp.zoo.toronto.edu
  26.  
  27.  
  28.  
  29. *** README.changes.mastercopy    Mon Jan  2 16:31:20 1995
  30. --- README.changes    Thu Dec 29 18:23:41 1994
  31. ***************
  32. *** 1,3 ****
  33. --- 1,19 ----
  34. + High points of patch CR.E:
  35. + This one is mostly fairly minor things.  The big changes are further work
  36. + on upact, to remove a race condition that would sometimes update the min
  37. + number incorrectly for low-traffic newsgroups, and revisions to inews's
  38. + interior to remove ersh and thus the last invocation of rsh, at the expense
  39. + of building somewhat longer message IDs when posting on a server from a
  40. + client.  Histinfo (used in mkhistory etc.) now ignores nonexistent articles
  41. + rather than croaking on them.  The newsflag command is now documented.  The
  42. + configuration setup used for regression tests has been revised to ignore
  43. + any NEWSCTL (etc.) environment variables that you may happen to have
  44. + in your environment (which may be right for production use, but are most
  45. + definitely wrong for the regression tests, which want to supply their own).
  46. + Quiz no longer offers to fake link(), which can't be done without breaking
  47. + the locking protocol (oops).  The expovguts messages have been improved.
  48. + More portability work in dostatfs.  And the usual minor fixes.
  49. + 
  50.   High points of patch CR.D:
  51.   This one's mostly a cleanup job on CR.B/CR.C.  The one really new item
  52.   is a queuelen appropriate to Taylor UUCP.  The master makefile has been
  53.  
  54.  
  55.  
  56. *** quiz.mastercopy    Mon Jan  2 16:31:20 1995
  57. --- quiz    Thu Dec  1 13:06:16 1994
  58. ***************
  59. *** 171,177 ****
  60.   possibly-missing system calls, but it needs to know which are missing.
  61.   !
  62.   newfake=
  63. ! mightfake='fcntl fgetline getopt gettimeofday link memcpy mkdir putenv
  64.       remove rename strchr strerror strspn symlink'
  65.   for fn in $mightfake
  66.   do
  67. --- 171,177 ----
  68.   possibly-missing system calls, but it needs to know which are missing.
  69.   !
  70.   newfake=
  71. ! mightfake='fcntl fgetline getopt gettimeofday memcpy mkdir putenv
  72.       remove rename strchr strerror strspn symlink'
  73.   for fn in $mightfake
  74.   do
  75. ***************
  76. *** 403,409 ****
  77.   do
  78.       uucptype=`$ask 'Which one is most appropriate' ${uucptype-hdb}`
  79.       case "$uucptype" in
  80. !     svr4|hdb|tay|sub|old|pre|null)    break    ;;
  81.       esac
  82.       echo 'Sorry, no such choice is available.'
  83.   done
  84. --- 403,409 ----
  85.   do
  86.       uucptype=`$ask 'Which one is most appropriate' ${uucptype-hdb}`
  87.       case "$uucptype" in
  88. !     svr4|hdb|tay|sub|vo|pre|null)    break    ;;
  89.       esac
  90.       echo 'Sorry, no such choice is available.'
  91.   done
  92.  
  93.  
  94.  
  95. *** conf/README.mastercopy    Mon Jan  2 16:31:21 1995
  96. --- conf/README    Thu Dec 29 16:10:02 1994
  97. ***************
  98. *** 1,10 ****
  99. ! This is C News master configuration stuff, including some auxiliary C News
  100. ! programs that are quite likely to need site-specific customizing, and some
  101. ! odds and ends of maintenance stuff that didn't fit anywhere else.
  102.   
  103. ! Subst may possibly be useful enough to deserve installation as a program
  104. ! in its own right, which is why a manual page is supplied.
  105. ! 
  106. ! "build" is the all-singing-all-dancing interactive shell program that sets
  107. ! up a bunch of shell files for you to run to install everything.  "build"
  108. ! itself does not mess with anything, so it can be run without danger.
  109. --- 1,32 ----
  110. ! This is configuration files and miscellaneous oddments that don't fit
  111. ! in any of the subsystems.
  112.   
  113. ! active.eg    sample active file
  114. ! ask        question-asker auxiliary for quiz
  115. ! checkfile    ownership/permission checker for make cmp
  116. ! cmpto        file comparer for make cmp
  117. ! config        sample config file
  118. ! cpto        file copier for installation
  119. ! cron.proto    prototype file from which sample crontab is generated
  120. ! deadfiles    list of files obsoleted by new releases of C News
  121. ! inall        do-command-in-all-directories auxiliary for top-level makefile
  122. ! libcmp        library-member comparer for make cmp
  123. ! mailname.eg    sample mailname file
  124. ! mailpaths.eg    sample mailpaths file
  125. ! makefilelist    list of makefiles for subst
  126. ! maker        make-with-include imitation
  127. ! mkdirs        directory maker for installation
  128. ! notinlist    list-checker auxiliary for quiz
  129. ! organization    sample organization file
  130. ! rconfig        regression-test config file
  131. ! rsetup        regression-test setup script
  132. ! subst        substituter
  133. ! subst.1        manpage for subst
  134. ! subst.all    list of all non-makefile files to be subst'ed
  135. ! sys.eg        sample sys file
  136. ! update.ran    ranlib version of library updater for make
  137. ! update.sym    symdef version of library updater for make
  138. ! useanswers    file-generator auxiliary for quiz
  139. ! versionname    version name of C News
  140. ! whoami.eg    sample whoami file
  141. ! yesno        question-asker auxiliary for quiz
  142.  
  143.  
  144.  
  145. *** conf/versionname.mastercopy    Mon Jan  2 16:31:21 1995
  146. --- conf/versionname    Thu Dec 29 17:14:58 1994
  147. ***************
  148. *** 1 ****
  149. ! Cleanup Release, with patch CR.D
  150. --- 1 ----
  151. ! Cleanup Release, with patch CR.E
  152.  
  153.  
  154.  
  155. *** conf/rsetup.mastercopy    Mon Jan  2 16:31:22 1995
  156. --- conf/rsetup    Thu Dec 29 15:39:59 1994
  157. ***************
  158. *** 0 ****
  159. --- 1,20 ----
  160. + # variable setup for regression tests
  161. + # This one overrides incoming values, which may not be right for testing,
  162. + # and exports the new values so rconfig will see them and defer to them.
  163. + #
  164. + NEWSCTL=`pwd`
  165. + NEWSBIN=`pwd`
  166. + NEWSARTS=`pwd`/arts
  167. + NEWSOV=$NEWSARTS
  168. + 
  169. + 
  170. + 
  171. + # =()<NEWSPATH=@<NEWSPATH>@>()=
  172. + NEWSPATH=/bin:/usr/bin:/usr/contrib/bin
  173. + 
  174. + 
  175. + 
  176. + NEWSUMASK=022
  177. + NEWSCONFIG=`pwd`/../conf/rconfig
  178. + LOGNAME=regression
  179. + export NEWSCTL NEWSBIN NEWSARTS NEWSOV NEWSPATH NEWSUMASK NEWSCONFIG LOGNAME
  180.  
  181.  
  182.  
  183. *** conf/useanswers.mastercopy    Mon Jan  2 16:31:22 1995
  184. --- conf/useanswers    Thu Dec 29 15:47:36 1994
  185. ***************
  186. *** 162,168 ****
  187.       echo "URGENTTO=$newscrisis"
  188.       echo
  189.       echo "# things for testing"
  190. !     echo "HERE=. ../conf/config.r ;"
  191.       echo
  192.       echo "# fake files needed"
  193.       echo "HFAKE=$fakehdrs"
  194. --- 162,168 ----
  195.       echo "URGENTTO=$newscrisis"
  196.       echo
  197.       echo "# things for testing"
  198. !     echo "HERE=. ../conf/rsetup ;"
  199.       echo
  200.       echo "# fake files needed"
  201.       echo "HFAKE=$fakehdrs"
  202.  
  203.  
  204.  
  205. *** conf/deadfiles.mastercopy    Mon Jan  2 16:31:23 1995
  206. --- conf/deadfiles    Mon Jan  2 16:26:16 1995
  207. ***************
  208. *** 1,4 ****
  209. --- 1,9 ----
  210. + conf/config.r
  211. + conf/substs
  212. + conf/libcheck
  213.   doc/flow.old
  214.   expire/mkadir
  215. + inject/ersh
  216. + libfake/link.c
  217.   util/queuelen.old
  218.   README.old
  219.  
  220.  
  221.  
  222. *** conf/subst.all.mastercopy    Mon Jan  2 16:31:23 1995
  223. --- conf/subst.all    Thu Dec 29 17:17:31 1994
  224. ***************
  225. *** 9,16 ****
  226.   batch/usenntpxmit
  227.   batch/viainews
  228.   conf/config
  229. - conf/config.r
  230.   conf/cron.proto
  231.   contrib/snntp/snntpsend
  232.   ctl/checkgroups
  233.   ctl/delsendsys
  234. --- 9,17 ----
  235.   batch/usenntpxmit
  236.   batch/viainews
  237.   conf/config
  238.   conf/cron.proto
  239. + conf/rconfig
  240. + conf/rsetup
  241.   contrib/snntp/snntpsend
  242.   ctl/checkgroups
  243.   ctl/delsendsys
  244. ***************
  245. *** 73,78 ****
  246. --- 74,80 ----
  247.   man/newsbatch.8cn
  248.   man/newsctl.5
  249.   man/newsdb.5
  250. + man/newsflag.8cn
  251.   man/newsmail.8cn
  252.   man/newsmaint.8cn
  253.   man/newsoverview.5
  254.  
  255.  
  256.  
  257. *** conf/makefile.mastercopy    Mon Jan  2 16:31:24 1995
  258. --- conf/makefile    Thu Dec 29 18:26:35 1994
  259. ***************
  260. *** 51,58 ****
  261.       test -d $(NEWSARTS)/$(LASTGROUP) -a -d $(NEWSOV)/$(LASTGROUP) ;
  262.   
  263.   mx:
  264. !     $(MX) checkfile cmpto config.r cpto inall libcheck libcmp maker
  265. !     $(MX) mkdirs subst update.*
  266.   
  267.   active.times:    active.eg
  268.       sed 's/ .*/ 0 unknown/' active.eg >$@
  269. --- 51,58 ----
  270.       test -d $(NEWSARTS)/$(LASTGROUP) -a -d $(NEWSOV)/$(LASTGROUP) ;
  271.   
  272.   mx:
  273. !     $(MX) checkfile cmpto cpto inall libcmp maker
  274. !     $(MX) mkdirs rconfig rsetup subst update.*
  275.   
  276.   active.times:    active.eg
  277.       sed 's/ .*/ 0 unknown/' active.eg >$@
  278.  
  279.  
  280.  
  281. *** conf/rconfig.mastercopy    Mon Jan  2 16:31:24 1995
  282. --- conf/rconfig    Thu Dec 29 15:40:07 1994
  283. ***************
  284. *** 0 ****
  285. --- 1,18 ----
  286. + # fake configuration for regression tests
  287. + # should be used only in conjunction with rsetup
  288. + #
  289. + NEWSCTL=${NEWSCTL-`pwd`}
  290. + NEWSBIN=${NEWSBIN-`pwd`}
  291. + NEWSARTS=${NEWSARTS-`pwd`/arts}
  292. + NEWSOV=$NEWSARTS
  293. + 
  294. + 
  295. + 
  296. + # =()<NEWSPATH=${NEWSPATH-@<NEWSPATH>@}>()=
  297. + NEWSPATH=${NEWSPATH-/bin:/usr/bin:/usr/contrib/bin}
  298. + 
  299. + 
  300. + 
  301. + NEWSUMASK=${NEWSUMASK-022}
  302. + NEWSCONFIG=${NEWSCONFIG-`pwd`/../conf/rconfig}
  303. + LOGNAME=${LOGNAME-regression}
  304.  
  305.  
  306.  
  307. *** doc/problems.mastercopy    Mon Jan  2 16:31:25 1995
  308. --- doc/problems    Tue Dec  6 22:37:18 1994
  309. ***************
  310. *** 1106,1109 ****
  311.   .DS
  312.   ftp://ftp.cim.mcgill.ca/pub/people/steve/pc/linux/join
  313.   .DE
  314. ! Textutils 1.11 reportedly has fixed this.
  315. --- 1106,1113 ----
  316.   .DS
  317.   ftp://ftp.cim.mcgill.ca/pub/people/steve/pc/linux/join
  318.   .DE
  319. ! Textutils 1.11 has fixed this.
  320. ! Unfortunately, it has introduced a new and different bug that
  321. ! makes the
  322. ! .I mergeactive
  323. ! regression test fail...
  324.  
  325.  
  326.  
  327. *** expire/upact.mastercopy    Mon Jan  2 17:47:17 1995
  328. --- expire/upact    Mon Jan  2 17:47:57 1995
  329. ***************
  330. *** 12,28 ****
  331.   umask $NEWSUMASK
  332.   
  333.   maxlen=200            # max length for shell cmd; 200 is pretty safe
  334. - mindirs=2            # minimum # dirs for ls -f
  335.   replace=yes
  336.   what=normal            # update min, make sure max has a 0 on front
  337.   lserr=/dev/null
  338.   for dummy
  339.   do
  340.       case "$1" in
  341.       -b)    what=both    ;;    # update both max and min
  342.       -p)    what=plain    ;;    # don't do ANYTHING to max
  343. !     -s)    maxlen=0 ; mindirs=1    ;;    # ls is funny, do slow way
  344.       '-#')    replace=no ; lserr=$NEWSCTL/active.errs    ;;    # debugging
  345.       --)    shift ; break    ;;
  346.       -*)    echo "$0: unknown option \`$1'" >&2 ; exit 2    ;;
  347.       *)    break        ;;
  348. --- 12,29 ----
  349.   umask $NEWSUMASK
  350.   
  351.   maxlen=200            # max length for shell cmd; 200 is pretty safe
  352.   replace=yes
  353.   what=normal            # update min, make sure max has a 0 on front
  354.   lserr=/dev/null
  355. + interpose=
  356.   for dummy
  357.   do
  358.       case "$1" in
  359.       -b)    what=both    ;;    # update both max and min
  360.       -p)    what=plain    ;;    # don't do ANYTHING to max
  361. !     -s)    maxlen=0    ;;    # ls is funny, do slow way
  362.       '-#')    replace=no ; lserr=$NEWSCTL/active.errs    ;;    # debugging
  363. +     -I)    interpose="$2" ; shift ;;    # interpose pgm for testing
  364.       --)    shift ; break    ;;
  365.       -*)    echo "$0: unknown option \`$1'" >&2 ; exit 2    ;;
  366.       *)    break        ;;
  367. ***************
  368. *** 32,49 ****
  369.   
  370.   cd $NEWSCTL
  371.   
  372.   # check out the active file
  373. ! checkactive -n -q >active.eek
  374.   if test -s active.eek
  375.   then
  376.       echo "$0: problems in active file -- aborting" >&2
  377.       cat active.eek >&2
  378. !     rm -f active.eek
  379. !     exit 1
  380. ! fi
  381. ! if test " `awk '{print $1}' active | sort | uniq -d`" != " "
  382. ! then
  383. !     echo "$0: duplicate newsgroups in active file, unable to run" >&2
  384.       exit 1
  385.   fi
  386.   
  387. --- 33,53 ----
  388.   
  389.   cd $NEWSCTL
  390.   
  391. + # lock news system momentarily and grab a copy of the active file
  392. + lock LOCK $$ || exit 1
  393. + status=1
  394. + trap 'unlock LOCK ; trap 0 ; exit $status' 0 1 2 15
  395. + sort active >active.upact || exit    # sort brings related dirs together
  396. + trap 0 1 2 15
  397. + unlock LOCK
  398. + 
  399.   # check out the active file
  400. ! checkactive -n -q active.upact >active.eek
  401.   if test -s active.eek
  402.   then
  403.       echo "$0: problems in active file -- aborting" >&2
  404.       cat active.eek >&2
  405. !     rm -f active.eek active.upact
  406.       exit 1
  407.   fi
  408.   
  409. ***************
  410. *** 52,69 ****
  411.   # rather different from his.  Thanks, Bernd!
  412.   
  413.   # first, find minima, efficiently
  414. ! # translate names to dirs, sort to bring related ones together (to exploit
  415. ! # any kernel caching), turn dirs into "ls -f" commands, run them, pick
  416. ! # the desired data out of the output, turn dirs back into names, and
  417. ! # sort for input to join
  418. ! tr '.' '/' <active | sort |
  419.       awk 'BEGIN {
  420.           maxlen = '"$maxlen"'
  421. -         mindirs = '"$mindirs"'
  422.           dirs = ""
  423.           ndirs = 0
  424.       }
  425. !     length($1) + length(dirs) > maxlen && ndirs >= mindirs {
  426.           if (ndirs == 1)
  427.               print "echo " substr(dirs, 2) ":"
  428.           print "ls -f" dirs
  429. --- 56,72 ----
  430.   # rather different from his.  Thanks, Bernd!
  431.   
  432.   # first, find minima, efficiently
  433. ! # translate names to dirs, turn dirs into "ls -f" commands, run them, pick
  434. ! # the desired data out of the output, turn dirs back into names, sort again,
  435. ! # and merge in old-max values
  436. ! tr '.' '/' <active.upact |
  437.       awk 'BEGIN {
  438.           maxlen = '"$maxlen"'
  439.           dirs = ""
  440.           ndirs = 0
  441. +         print "cd '"$NEWSARTS"'"
  442.       }
  443. !     length($1) + length(dirs) > maxlen && ndirs > 0 {
  444.           if (ndirs == 1)
  445.               print "echo " substr(dirs, 2) ":"
  446.           print "ls -f" dirs
  447. ***************
  448. *** 77,83 ****
  449.               print "echo " substr(dirs, 2) ":"
  450.           print "ls -f" dirs
  451.           print "echo /.:"        # simplifies later logic
  452. !     }' | ( cd $NEWSARTS ; sh 2>$lserr ) |
  453.       awk -F' ' 'BEGIN {
  454.           OFMT = "%.12g"
  455.           big = 99999999999
  456. --- 80,86 ----
  457.               print "echo " substr(dirs, 2) ":"
  458.           print "ls -f" dirs
  459.           print "echo /.:"        # simplifies later logic
  460. !     }' | sh 2>$lserr |
  461.       awk -F' ' 'BEGIN {
  462.           OFMT = "%.12g"
  463.           big = 99999999999
  464. ***************
  465. *** 95,120 ****
  466.           next
  467.       }
  468.       $0 ~ /\/\.:$/ {
  469. !         if (dir != "" && highest != small)
  470. !             print dir, highest, lowest
  471.           dir = substr($0, 1, length($0)-3)    # trim off /.:
  472.           lowest = big
  473.           highest = small
  474. !     }' | tr '/' '.' | sort >active.lows
  475.   
  476. ! # lock news system
  477.   lock LOCK $$ || exit 1
  478.   status=1
  479.   trap 'unlock LOCK ; trap 0 ; exit $status' 0 1 2 15
  480.   
  481. ! # combine results with active file, carefully
  482.   extra=
  483.   case "$what" in
  484. ! both)    extra='$6 != "-" && $6 > $3 {
  485. !         s = "000000000000000" $6
  486.           len = length($3)
  487. !         if (length($6) > len)
  488. !             len = length($6) + 1
  489.           s = substr(s, length(s)-len+1)
  490.           if (s !~ /^0/)
  491.               s = "0" s
  492. --- 98,136 ----
  493.           next
  494.       }
  495.       $0 ~ /\/\.:$/ {
  496. !         if (dir != "") {
  497. !             if (highest != small)
  498. !                 print dir, highest, lowest
  499. !             else
  500. !                 print dir, "-", "-"
  501. !         }
  502.           dir = substr($0, 1, length($0)-3)    # trim off /.:
  503.           lowest = big
  504.           highest = small
  505. !     }' | tr '/' '.' | sort |
  506. !     join -o 1.1 2.2 1.2 1.3 - active.upact >active.hilow
  507. ! # active.hilow now is newsgroup, old max, high file, low file
  508. ! 
  509. ! # testing hook
  510. ! if test " $interpose" != " "
  511. ! then
  512. !     $interpose
  513. ! fi
  514.   
  515. ! # lock news system again
  516.   lock LOCK $$ || exit 1
  517.   status=1
  518.   trap 'unlock LOCK ; trap 0 ; exit $status' 0 1 2 15
  519.   
  520. ! # decide on any extra processing needed
  521.   extra=
  522.   case "$what" in
  523. ! both)    extra='$7 != "-" && $7 > $3 {
  524. !         # update max from high file
  525. !         s = "000000000000000" $7
  526.           len = length($3)
  527. !         if (length($7) > len)
  528. !             len = length($7) + 1
  529.           s = substr(s, length(s)-len+1)
  530.           if (s !~ /^0/)
  531.               s = "0" s
  532. ***************
  533. *** 123,144 ****
  534.       ;;
  535.   normal)    extra='$3 !~ /^0/ { $3 = "0" $3 }'    ;;
  536.   esac
  537.   awk '{ print $1, $2, $3, $4, NR }' active | sort |
  538. !     join -a1 -e - -o 1.5 1.1 1.2 1.3 1.4 2.2 2.3 - active.lows |
  539.       sort -n |
  540.       awk 'BEGIN { OFMT = "%.12g" }
  541.       $1 == "-" { next }        # no longer in active file
  542.       '"$extra"'
  543.       {
  544. !         if ($7 == "-" || $7 == "")
  545. !             s = $3 + 1
  546. !         else
  547. !             s = $7
  548.           if (length(s) < 5) {
  549.               s = "00000" s
  550.               s = substr(s, length(s)-5+1)
  551.           }
  552. !         print $2, ($3 ""), s, $5
  553.       }' >active.tmp
  554.   
  555.   # check that everything looks okay
  556. --- 139,169 ----
  557.       ;;
  558.   normal)    extra='$3 !~ /^0/ { $3 = "0" $3 }'    ;;
  559.   esac
  560. + 
  561. + # build new active file, cautiously
  562. + # The result of the join is line number (for the sort -n that restores the
  563. + # old order of the active file), newsgroup, active max, active min, active
  564. + # flags, old max, high file, low file.
  565.   awk '{ print $1, $2, $3, $4, NR }' active | sort |
  566. !     join -a1 -e - -o 1.5 1.1 1.2 1.3 1.4 2.2 2.3 2.4 - active.hilow |
  567.       sort -n |
  568.       awk 'BEGIN { OFMT = "%.12g" }
  569.       $1 == "-" { next }        # no longer in active file
  570.       '"$extra"'
  571.       {
  572. !         # find a new value for min
  573. !         if ($8 != "-" && $8 != "")    # there was a low file
  574. !             s = $8            # use it
  575. !         else if ($6+0 != $3+0)        # oldmax != newmax, race cond!
  576. !             s = $4            # use old value to be safe
  577. !         else                # no files and no race
  578. !             s = $3 + 1        # use max+1
  579. ! 
  580.           if (length(s) < 5) {
  581.               s = "00000" s
  582.               s = substr(s, length(s)-5+1)
  583.           }
  584. !         print $2, ($3 ""), s, $5    # the "" forces string version
  585.       }' >active.tmp
  586.   
  587.   # check that everything looks okay
  588. ***************
  589. *** 154,161 ****
  590.       echo "$0: active.tmp is bad (short) -- aborting" >&2
  591.       exit            # with status=1
  592.   fi
  593. ! rm -f active.eek active.lows
  594.   
  595.   case "$replace" in
  596.   no)    status=0 ; exit    ;;
  597.   esac
  598. --- 179,187 ----
  599.       echo "$0: active.tmp is bad (short) -- aborting" >&2
  600.       exit            # with status=1
  601.   fi
  602. ! rm -f active.eek active.hilow active.upact    # clean up temporaries
  603.   
  604. + # if we weren't asked to install it, don't
  605.   case "$replace" in
  606.   no)    status=0 ; exit    ;;
  607.   esac
  608.  
  609.  
  610.  
  611. *** expire/makefile.mastercopy    Mon Jan  2 17:36:16 1995
  612. --- expire/makefile    Mon Jan  2 17:31:17 1995
  613. ***************
  614. *** 111,117 ****
  615.       echo 'mod.unmod 00016 00001 y' >>active
  616.       echo 'mod.unmod 00016 00016 y' >>active.after
  617.       echo 'bletch 00099 00001 y' >>active
  618. !     echo 'bletch 00099 00100 y' >>active.after
  619.       cat $(AB) >>active
  620.       cat $(AB) >>active.after
  621.       echo nevermore >arts/lost+found/1
  622. --- 111,117 ----
  623.       echo 'mod.unmod 00016 00001 y' >>active
  624.       echo 'mod.unmod 00016 00016 y' >>active.after
  625.       echo 'bletch 00099 00001 y' >>active
  626. !     echo 'bletch 00100 00001 y' >>active.after
  627.       cat $(AB) >>active
  628.       cat $(AB) >>active.after
  629.       echo nevermore >arts/lost+found/1
  630. ***************
  631. *** 218,240 ****
  632.       test -f arch2/bar/99 ;
  633.       test ! -f arts/urp/99 ;
  634.       cmp history history.after
  635.       : "that's it for expire, on to upact"
  636. !     $(HERE) ./upact $(UPACTOPT) '-#'
  637. !     cmp active.after active.tmp || diff active.after active.tmp
  638.       test ! -s active.errs ;
  639.       mv active.tmp active
  640.       $(HERE) ./upact $(UPACTOPT)
  641. !     cmp active.after active || diff active.after active
  642. !     sed '/^foo /s/103/009/' active.after >active
  643.       $(HERE) ./upact -b $(UPACTOPT)
  644. !     cmp active.after active || diff active.after active
  645.       : "success!"
  646.   
  647.   rclean:
  648.       rm -f junk history history.pag history.dir history.o active active.tmp
  649.       rm -f history.n* *mon.out history.proto history.after test.out doit
  650. !     rm -f active.old active.new explist.reg lint active.after test.stderr
  651. !     rm -f active.errs explist.regw $(BARFS) canonsys.awk namecheck.awk sys
  652.       rm -rf arts arch arch2 arch3 bin
  653.   
  654.   clean:    rclean
  655. --- 218,247 ----
  656.       test -f arch2/bar/99 ;
  657.       test ! -f arts/urp/99 ;
  658.       cmp history history.after
  659. +     test -s history.dir ;
  660. +     test -s history.pag ;
  661.       : "that's it for expire, on to upact"
  662. !     echo "sed '/bletch/s/099/100/' active >active.up" >junk
  663. !     echo "mv active.up active" >>junk
  664. !     $(MX) junk
  665. !     $(HERE) ./upact $(UPACTOPT) -I `pwd`/junk '-#'
  666.       test ! -s active.errs ;
  667. +     cmp active.after active.tmp || diff active.after active.tmp
  668.       mv active.tmp active
  669. +     sed '/bletch/s/001 /101 /' active.after >active.after2
  670.       $(HERE) ./upact $(UPACTOPT)
  671. !     cmp active.after2 active || diff active.after2 active
  672. !     sed '/^foo /s/103/009/' active.after2 >active
  673.       $(HERE) ./upact -b $(UPACTOPT)
  674. !     cmp active.after2 active || diff active.after2 active
  675.       : "success!"
  676.   
  677.   rclean:
  678.       rm -f junk history history.pag history.dir history.o active active.tmp
  679.       rm -f history.n* *mon.out history.proto history.after test.out doit
  680. !     rm -f active.old active.new explist.reg lint active.after* test.stderr
  681. !     rm -f active.errs explist.regw $(BARFS)
  682. !     rm -f canonsys.awk namecheck.awk sys L*
  683.       rm -rf arts arch arch2 arch3 bin
  684.   
  685.   clean:    rclean
  686.  
  687.  
  688.  
  689. *** inject/defaults.c.mastercopy    Mon Jan  2 16:31:27 1995
  690. --- inject/defaults.c    Thu Dec 29 21:59:56 1994
  691. ***************
  692. *** 32,37 ****
  693. --- 32,40 ----
  694.   int usggcos;            /* strictly speaking, "BTL RJE format" */
  695.   time_t now;
  696.   long pid;
  697. + char *server = NULL;
  698. + char *client = NULL;
  699. + size_t ntrimmed = 0;        /* number of chars trimmed off client */
  700.   
  701.   /*
  702.    * main - parse arguments and handle options
  703. ***************
  704. *** 44,50 ****
  705.   
  706.       if (argc > 0)
  707.           progname = argv[0];
  708. !     while ((c = getopt(argc, argv, "dp:t:u")) != EOF)
  709.           switch (c) {
  710.           case 'd':
  711.               ++debug;
  712. --- 47,53 ----
  713.   
  714.       if (argc > 0)
  715.           progname = argv[0];
  716. !     while ((c = getopt(argc, argv, "dp:t:c:s:u")) != EOF)
  717.           switch (c) {
  718.           case 'd':
  719.               ++debug;
  720. ***************
  721. *** 55,60 ****
  722. --- 58,69 ----
  723.           case 't':
  724.               now = atol(optarg);
  725.               break;
  726. +         case 'c':
  727. +             client = optarg;
  728. +             break;
  729. +         case 's':
  730. +             server = optarg;
  731. +             break;
  732.           case 'u':
  733.               usggcos++;
  734.               break;
  735. ***************
  736. *** 68,77 ****
  737. --- 77,113 ----
  738.           exit(2);
  739.       }
  740.   
  741. +     if (client != NULL && server != NULL)
  742. +         trimclient();
  743.       getdefaults();
  744.       exit(0);
  745.   }
  746.   
  747. + /*
  748. +  - trimclient - null out (in client) common suffix of client and server
  749. +  * length of suffix left in ntrimmed
  750. +  */
  751. + trimclient()
  752. + {
  753. +     register size_t clen = strlen(client);
  754. +     register char *c = client + clen;
  755. +     register char *s = server + strlen(server);
  756. + 
  757. +     for (; *c == *s && c > client && s > server; c--, s--)
  758. +         continue;
  759. +     if (*c != *s)
  760. +         c++;        /* c -> last identical char */
  761. +     else if (c > client && s == server && *(c-1) == '.')
  762. +         c--;        /* server name considered to have . on front */
  763. +     if (c > client && *(c-1) == '.') {
  764. +         /* must not end with . */
  765. +         while (*(c-1) == '.' && *c != '\0')
  766. +             c++;
  767. +     }
  768. +     *c = '\0';
  769. +     ntrimmed = clen - (c - client);
  770. + }
  771. + 
  772.   getdefaults()
  773.   {
  774.       register char *name, *domainsuf, *org;
  775. ***************
  776. *** 97,102 ****
  777. --- 133,146 ----
  778.       intcode(now == 0? time(&now): now);
  779.       (void) putchar('.');
  780.       intcode((time_t)(pid == 0? getpid(): pid));
  781. +     if (client != NULL) {
  782. +         (void) putchar('.');
  783. +         intcode((time_t)ntrimmed);
  784. +         if (*client != '\0') {
  785. +             (void) putchar('.');
  786. +             (void) fputs(client, stdout);
  787. +         }
  788. +     }
  789.       (void) fputs(domainsuf, stdout);
  790.       (void) putchar('>');
  791.   
  792.  
  793.  
  794.  
  795. *** inject/pnews.mastercopy    Mon Jan  2 16:31:27 1995
  796. --- inject/pnews    Thu Dec 29 21:36:12 1994
  797. ***************
  798. *** 39,59 ****
  799.   if tear $prefix &&    # output in $inhdrs and $inbody ** takes 0.4 seconds
  800.       canonhdr -dm <$inhdrs >$hdrs    # dredge up defaults ** takes 0.1 secs
  801.   then
  802. !     # get time & pid from the server
  803. !     server="` cat $NEWSCTL/server 2>/dev/null `"
  804. !     case "$server" in
  805. !     "")    me="$server" ;;        # if no server file, assume this is it
  806. !     *)    me="` hostname `"    ;;
  807. !     esac
  808. !     case "$me" in
  809. !     $server) args= ;;
  810. !     *)    args="`
  811. !             (echo PATH=$PATH
  812. !              echo 'echo -p $$ -t'
  813. !              echo now) |
  814. !                 ersh $server /bin/sh
  815. !         `" ;;
  816. !     esac
  817.   
  818.       # POLICY: msgid format; usg gcos?
  819.       # tailor: add -u for USG GCOS fields
  820. --- 39,56 ----
  821.   if tear $prefix &&    # output in $inhdrs and $inbody ** takes 0.4 seconds
  822.       canonhdr -dm <$inhdrs >$hdrs    # dredge up defaults ** takes 0.1 secs
  823.   then
  824. !     # are we a client of a server?
  825. !     if test -r $NEWSCTL/server
  826. !     then
  827. !         svr="`cat $NEWSCTL/server`"
  828. !         me="`hostname`"
  829. !         case "$me" in
  830. !         $svr)    args=                ;;
  831. !         *)    args="-c $me -s $server"    ;;
  832. !         esac
  833. !     else
  834. !         args=
  835. !     fi
  836.   
  837.       # POLICY: msgid format; usg gcos?
  838.       # tailor: add -u for USG GCOS fields
  839.  
  840.  
  841.  
  842. *** input/makefile.mastercopy    Mon Jan  2 16:31:28 1995
  843. --- input/makefile    Wed Dec 28 22:05:54 1994
  844. ***************
  845. *** 118,124 ****
  846.       echo 'echo "$$*" ; cat >&2' >bin/report
  847.       echo ':' >bin/domkov
  848.       mkdir decompressors
  849. !     echo 'sed 1d $$*' >decompressors/dejunk
  850.       $(MX) bin/* decompressors/*
  851.       mkdir arts arts/in.coming ;        # but not bad, yet
  852.   
  853. --- 118,124 ----
  854.       echo 'echo "$$*" ; cat >&2' >bin/report
  855.       echo ':' >bin/domkov
  856.       mkdir decompressors
  857. !     echo 'sed 1d' >decompressors/dejunk
  858.       $(MX) bin/* decompressors/*
  859.       mkdir arts arts/in.coming ;        # but not bad, yet
  860.   
  861.  
  862.  
  863.  
  864. *** libdbz/makefile.mastercopy    Mon Jan  2 16:31:29 1995
  865. --- libdbz/makefile    Tue Dec 13 23:36:24 1994
  866. ***************
  867. *** 37,43 ****
  868.   lint:
  869.       lint $(LINTFLAGS) dbzmain.c dbz.c dbzdbm.c
  870.   
  871. ! rdbz tdbz fake byteflip:    $(LIBS)
  872.   
  873.   rdbz.o:    dbz.c
  874.       cp dbz.c rdbz.c
  875. --- 37,43 ----
  876.   lint:
  877.       lint $(LINTFLAGS) dbzmain.c dbz.c dbzdbm.c
  878.   
  879. ! rdbz tdbz fake byteflip:    $(LIB)
  880.   
  881.   rdbz.o:    dbz.c
  882.       cp dbz.c rdbz.c
  883.  
  884.  
  885.  
  886. *** maint/histinfo.c.mastercopy    Mon Jan  2 16:31:29 1995
  887. --- maint/histinfo.c    Mon Dec 19 00:46:07 1994
  888. ***************
  889. *** 6,11 ****
  890. --- 6,13 ----
  891.   #include <sys/types.h>
  892.   #include <sys/stat.h>        /* for modified time (date received) */
  893.   #include <string.h>
  894. + #include <errno.h>
  895. + #include "fixerrno.h"
  896.   #include "config.h"
  897.   #include "fgetfln.h"
  898.   #include "alloc.h"
  899. ***************
  900. *** 16,22 ****
  901.   char *progname;
  902.   int debug;
  903.   
  904. - FILE *efopen();
  905.   
  906.   char *spdir;
  907.   int spdirlen;
  908. --- 18,23 ----
  909. ***************
  910. *** 56,64 ****
  911.       
  912.       while ((inname = fgetline(stdin, (size_t *)NULL)) != NULL)
  913.           if (strchr(inname, '.') == NULL) {    /* skip dot names */
  914. !             in = efopen(inname, "r");
  915. !             process(in, inname);
  916. !             (void) fclose(in);
  917.           }
  918.       exit(0);
  919.   }
  920. --- 57,70 ----
  921.       
  922.       while ((inname = fgetline(stdin, (size_t *)NULL)) != NULL)
  923.           if (strchr(inname, '.') == NULL) {    /* skip dot names */
  924. !             errno = 0;
  925. !             in = fopen(inname, "r");
  926. !             if (in == NULL && errno != ENOENT)
  927. !                 error("cannot open file `%s'", inname);
  928. !             if (in != NULL) {
  929. !                 process(in, inname);
  930. !                 (void) fclose(in);
  931. !             }
  932.           }
  933.       exit(0);
  934.   }
  935.  
  936.  
  937.  
  938. *** maint/makefile.mastercopy    Mon Jan  2 16:31:30 1995
  939. --- maint/makefile    Sun Jan  1 18:34:23 1995
  940. ***************
  941. *** 28,34 ****
  942.   setup:
  943.   
  944.   cmp:    $(ALL)
  945. !     @$(IN) $(DEST) $(DPROGS)
  946.       @$(IN) $(UIBIN) $(UI)
  947.       $(DEST)/checkactive -q
  948.   
  949. --- 28,35 ----
  950.   setup:
  951.   
  952.   cmp:    $(ALL)
  953. !     @$(IN) $(DEST) $(NORMAL)
  954. !     @$(IN) -i $(DEST) $(CUSTOM)
  955.       @$(IN) $(UIBIN) $(UI)
  956.       $(DEST)/checkactive -q
  957.   
  958.  
  959.  
  960.  
  961. *** man/newsflag.8cn.mastercopy    Mon Jan  2 16:31:31 1995
  962. --- man/newsflag.8cn    Tue Dec 13 13:47:17 1994
  963. ***************
  964. *** 0 ****
  965. --- 1,46 ----
  966. + .\" =()<.ds a @<NEWSARTS>@>()=
  967. + .ds a /var/news
  968. + .\" =()<.ds b @<NEWSBIN>@>()=
  969. + .ds b /usr/libexec/news
  970. + .\" =()<.ds c @<NEWSCTL>@>()=
  971. + .ds c /etc/news
  972. + .\"
  973. + .\"
  974. + .\"
  975. + .TH NEWSFLAG 8CN "13 Dec 1994"
  976. + .BY "C News"
  977. + .SH NAME
  978. + newsflag \- change active-file flag for newsgroup
  979. + .SH SYNOPSIS
  980. + .B \*b/maint/newsflag
  981. + newsgroup
  982. + newval
  983. + .SH DESCRIPTION
  984. + .I Newsflag
  985. + sets the fourth field of
  986. + .IR newsgroup 's
  987. + entry in the
  988. + .I active
  989. + file (see
  990. + .IR newsdb (5))
  991. + to
  992. + .IR newval ,
  993. + doing proper locking to ensure safe modification of the file.
  994. + For example, to change newsgroup
  995. + .I x.y.z
  996. + from unmoderated to moderated:
  997. + .PP
  998. + .RS
  999. + .nf
  1000. + newsflag x.y.z m
  1001. + .fi
  1002. + .RE
  1003. + .PP
  1004. + The effect is purely local; no control message (to propagate the
  1005. + change to other machines) is sent.
  1006. + .SH FILES
  1007. + \*c/active
  1008. + .SH SEE ALSO
  1009. + newsdb(5)
  1010. + .SH HISTORY
  1011. + Written by Henry Spencer for C News.
  1012.  
  1013.  
  1014.  
  1015. *** nov/expovguts.c.mastercopy    Mon Jan  2 16:31:31 1995
  1016. --- nov/expovguts.c    Wed Dec 28 18:06:05 1994
  1017. ***************
  1018. *** 60,68 ****
  1019.   
  1020.       start = atol(argv[optind+1]);
  1021.       stop = atol(argv[optind]);        /* tentatively */
  1022. !     if (start > stop+1 || start == 0) {
  1023. !         fprintf(stderr, "%s: min (%s) is 0 or exceeds max (%s) + 1\n",
  1024. !                 progname, argv[optind+1], argv[optind]);
  1025.           exit(2);
  1026.       }
  1027.       stop += 100;                /* a bit of headroom */
  1028. --- 60,75 ----
  1029.   
  1030.       start = atol(argv[optind+1]);
  1031.       stop = atol(argv[optind]);        /* tentatively */
  1032. !     if (start == 0) {
  1033. !         fprintf(stderr, "%s: in expiring `%s',\n", progname, inname);
  1034. !         fprintf(stderr, "\tfound problem in active file:  min == 0\n",
  1035. !                             argv[optind+1]);
  1036. !         exit(2);
  1037. !     }
  1038. !     if (start > stop+1) {
  1039. !         fprintf(stderr, "%s: in expiring `%s',\n", progname, inname);
  1040. !         fprintf(stderr, "\tfound problem in active file:  min (%s) > max (%s) + 1\n",
  1041. !                     argv[optind+1], argv[optind]);
  1042.           exit(2);
  1043.       }
  1044.       stop += 100;                /* a bit of headroom */
  1045. ***************
  1046. *** 126,134 ****
  1047.       }
  1048.   
  1049.       if (nbad > 0) {
  1050. !         fprintf(stderr, "%s: in expiring `%s',\n", progname, inname);
  1051. !         fprintf(stderr, "\tfound %d files with numbers < min (%ld)\n",
  1052.                                   nbad, start);
  1053.       }
  1054.   }
  1055.   
  1056. --- 133,143 ----
  1057.       }
  1058.   
  1059.       if (nbad > 0) {
  1060. !         fprintf(stderr, "%s: (warning) in expiring `%s',\n", progname,
  1061. !                                 inname);
  1062. !         fprintf(stderr, "\tfound %d files with numbers < min (%ld),\n",
  1063.                                   nbad, start);
  1064. +         fprintf(stderr, "\tindicating problems with upact\n");
  1065.       }
  1066.   }
  1067.   
  1068.  
  1069.  
  1070.  
  1071. *** nov/expov.mastercopy    Mon Jan  2 16:31:32 1995
  1072. --- nov/expov    Wed Dec 28 18:09:00 1994
  1073. ***************
  1074. *** 46,53 ****
  1075.               echo "    ...using fallback code" >&2
  1076.   
  1077.               # fallback
  1078. !             # could use one less temporary if certain systems
  1079. !             # didn't have buggy implementations of sort -o
  1080.               sort $o/.overview >$o/.sov
  1081.               ls | egrep '^[0-9]+$' | join -t'    ' - $o/.sov |
  1082.                               sort -n >$o/.nov
  1083. --- 46,53 ----
  1084.               echo "    ...using fallback code" >&2
  1085.   
  1086.               # fallback
  1087. !             # could use one less temporary if GNU sort didn't
  1088. !             # have bugs in -o
  1089.               sort $o/.overview >$o/.sov
  1090.               ls | egrep '^[0-9]+$' | join -t'    ' - $o/.sov |
  1091.                               sort -n >$o/.nov
  1092.  
  1093.  
  1094.  
  1095. *** util/dostatfs.c.mastercopy    Mon Jan  2 16:31:32 1995
  1096. --- util/dostatfs.c    Mon Jan  2 16:07:09 1995
  1097. ***************
  1098. *** 17,35 ****
  1099.   #include <sys/mount.h>
  1100.   
  1101.   /* Second, assorted variations... */
  1102. ! #ifdef BSD4_4
  1103. ! #define    UNIT    f_bsize
  1104.   #endif
  1105.   #ifdef sun
  1106.   #include <sys/vfs.h>
  1107.   #define    UNIT    f_bsize
  1108.   #endif
  1109.   #ifdef _AIX
  1110.   #include <sys/statfs.h>
  1111.   #endif
  1112.   #ifdef M_XENIX        /* SCO */
  1113.   #include <sys/statfs.h>
  1114.   #define    STATFS(fs, result)    statfs(fs, &result, (int)sizeof(result), 0)
  1115.   #endif
  1116.   
  1117.   /* Finally, some defaults to simplify the above. */
  1118. --- 17,55 ----
  1119.   #include <sys/mount.h>
  1120.   
  1121.   /* Second, assorted variations... */
  1122. ! #ifdef linux
  1123. ! #define    sun    1    /* Linux happens to be the same as Sun for this... */
  1124. ! #else
  1125. ! #ifdef __linux__
  1126. ! #define    sun    1    /* a Linux by any other name... */
  1127. ! #endif
  1128. ! #endif
  1129. ! #ifdef hpux
  1130. ! #define    sun    1    /* likewise HP */
  1131.   #endif
  1132. + #ifdef __FreeBSD__
  1133. + #define    BSD4_4    1    /* and FreeBSD is sort of 4.4 */
  1134. + #endif
  1135. + 
  1136.   #ifdef sun
  1137.   #include <sys/vfs.h>
  1138.   #define    UNIT    f_bsize
  1139.   #endif
  1140. + 
  1141.   #ifdef _AIX
  1142.   #include <sys/statfs.h>
  1143. + #define    UNIT    f_fsize
  1144.   #endif
  1145. + 
  1146.   #ifdef M_XENIX        /* SCO */
  1147.   #include <sys/statfs.h>
  1148.   #define    STATFS(fs, result)    statfs(fs, &result, (int)sizeof(result), 0)
  1149. + #define    UNIT    f_fsize
  1150. + #define    f_bavail    f_bfree    /* talk about kludges */
  1151. + #endif
  1152. + 
  1153. + #ifdef BSD4_4
  1154. + #define    UNIT    f_bsize
  1155.   #endif
  1156.   
  1157.   /* Finally, some defaults to simplify the above. */
  1158.  
  1159.  
  1160.  
  1161.